home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
HAM Radio 1997
/
HAM Radio 1997.iso
/
vcls
/
fbuf
/
bufftest.dfm
/
bufftest.txt
Wrap
Text File
|
1996-04-08
|
4KB
|
217 lines
object Form1: TForm1
Left = 526
Top = 90
Width = 476
Height = 360
Caption = 'Test FileBuff Unit'
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
PixelsPerInch = 120
TextHeight = 16
object Label1: TLabel
Left = 8
Top = 60
Width = 181
Height = 16
Alignment = taRightJustify
AutoSize = False
Caption = 'File Creation Test'
end
object Label2: TLabel
Left = 8
Top = 88
Width = 181
Height = 16
Alignment = taRightJustify
AutoSize = False
Caption = 'Copy File Uniform'
end
object Label3: TLabel
Left = 8
Top = 116
Width = 181
Height = 16
Alignment = taRightJustify
AutoSize = False
Caption = 'Read File Only'
end
object Label4: TLabel
Left = 12
Top = 144
Width = 177
Height = 16
Alignment = taRightJustify
AutoSize = False
Caption = 'Modify file in place'
end
object Label5: TLabel
Left = 212
Top = 32
Width = 78
Height = 16
Caption = 'UnBuffered'
end
object Label6: TLabel
Left = 360
Top = 32
Width = 59
Height = 16
Caption = 'Buffered'
end
object Label7: TLabel
Left = 12
Top = 172
Width = 177
Height = 16
Alignment = taRightJustify
AutoSize = False
Caption = 'Best Speed 64k writes'
end
object Label8: TLabel
Left = 12
Top = 200
Width = 177
Height = 16
Alignment = taRightJustify
AutoSize = False
Caption = 'Best Speed 64k Reads'
end
object Label9: TLabel
Left = 52
Top = 256
Width = 75
Height = 16
Caption = 'Buffer Size'
end
object Label10: TLabel
Left = 188
Top = 256
Width = 86
Height = 16
Caption = 'Record Size'
end
object Label11: TLabel
Left = 320
Top = 256
Width = 100
Height = 16
Caption = 'Num Iterations'
end
object Button1: TButton
Left = 12
Top = 8
Width = 113
Height = 33
Caption = 'Begin Test'
Default = True
TabOrder = 0
OnClick = Button1Click
end
object FileCreateResult: TEdit
Left = 196
Top = 56
Width = 121
Height = 24
Enabled = False
TabOrder = 1
end
object UniformCopyResult: TEdit
Left = 196
Top = 84
Width = 121
Height = 24
Enabled = False
TabOrder = 2
end
object FileReadResults: TEdit
Left = 196
Top = 112
Width = 121
Height = 24
Enabled = False
TabOrder = 3
end
object ModifyInPlaceResults: TEdit
Left = 196
Top = 140
Width = 121
Height = 24
Enabled = False
TabOrder = 4
end
object FileCreate2: TEdit
Left = 328
Top = 56
Width = 121
Height = 24
Enabled = False
TabOrder = 5
end
object FileCopy2: TEdit
Left = 328
Top = 84
Width = 121
Height = 24
Enabled = False
TabOrder = 6
end
object FileReadResults2: TEdit
Left = 328
Top = 112
Width = 121
Height = 24
Enabled = False
TabOrder = 7
end
object FileModify2: TEdit
Left = 328
Top = 140
Width = 121
Height = 24
Enabled = False
TabOrder = 8
end
object Write64k: TEdit
Left = 196
Top = 168
Width = 121
Height = 24
Enabled = False
TabOrder = 9
end
object Read64k: TEdit
Left = 196
Top = 196
Width = 121
Height = 24
Enabled = False
TabOrder = 10
end
object BuffSize: TEdit
Left = 52
Top = 276
Width = 121
Height = 24
TabOrder = 11
Text = '32767'
end
object RecSize: TEdit
Left = 188
Top = 276
Width = 121
Height = 24
TabOrder = 12
Text = '31'
end
object NumIter: TEdit
Left = 320
Top = 276
Width = 121
Height = 24
TabOrder = 13
Text = '200000'
end
end